home *** CD-ROM | disk | FTP | other *** search
/ Gigantic Games 2 / Gigantic Games 2.iso / pc / _a_ / abitur / txt / faechernamen.def < prev    next >
Text File  |  1994-12-23  |  647b  |  22 lines
  1. DEFINITION MODULE FaecherNamen;
  2.  
  3. TYPE FaecherTypen = (Turnen,       (* Sympathinoten   *)
  4.                      Geographie,   (* Zufallsnoten    *)
  5.                      Geschichte,   (* Erfahrungsnoten *)
  6.  
  7.                      Franz, Deutsch,Englisch, Latein,
  8.                      Zeichnen, Werken, Musik, Mathe,
  9.                      Physik, Chemie, Bio, Informatik);
  10.  
  11.  
  12.     FachName = RECORD
  13.                   ShortCut: ARRAY[0.. 4] OF CHAR; (* Für StundenPl *)
  14.                   VollName: ARRAY[0..63] OF CHAR
  15.                END;
  16.  
  17. VAR  FaecherNamen: ARRAY[Turnen..Informatik] OF FachName;
  18.  (* Werden am Anfang initialisiert *)
  19.  
  20. END FaecherNamen.
  21.  
  22.